Is < x is preferred in Basic syntax, whereas Up to but not including (upTo_ x) is preferred in Crystal syntax.
Is < x is used to specify a range of values less than the value x. x can be of any type: Number, Boolean, Currency, Date, Time, DateTime, and String.
The following example is applicable to Basic syntax:
Dim BlackoutDates() As Date Range
Rem Blackout period is any day before 1999 or any date within March 1999
BlackoutDates = Array (Is < CDate(1999, 1, 1), _
CDate(1999, 3, 1) To CDate (1999, 3, 31))
If CurrentDate In BlackoutDates Then
If today's date is Dec. 30, 1998, then "Blackout" is returned since it is within the Blackout period before 1999.
If today's date is Jan. 1, 1999, then "Free to trade" is returned since it is not within any blackout period.
If today's date is March 31, 1999, then "Blackout" is returned since it is within the Blackout month of March.
If today's date is Oct. 30, 1999, then "Free to trade" is returned since it is not within any blackout period.
Seagate Software IMG Holdings, Inc. http://www.seagatesoftware.com Support services: http://support.seagatesoftware.com |